﻿
Public Class itens_avaliacaoVO

    Private _id_item As Integer
    Private _num_registro As Integer
    Private _ano_registro As Integer
    Private _id_secao As Integer
    Private _desc_item As String
    Private _qte As Decimal
    Private _valor As Decimal
    Private _diretorio As String


    '-------------------------------------
    ' MÉTODO CONSTRUTOR SEM PARAMETROS
    '-------------------------------------

    Sub New()
        _id_item = Nothing
        _num_registro = Nothing
        _ano_registro = Nothing
        _id_secao = Nothing
        _desc_item = Nothing
        _qte = Nothing
        _valor = Nothing
        _diretorio = Nothing
    End Sub

    '-------------------------------------
    ' MÉTODO CONSTRUTOR COM PARAMETROS
    '-------------------------------------

    Sub New(ByVal id_item As Integer, _
            ByVal num_registro As Integer, _
            ByVal ano_registro As Integer, _
            ByVal id_secao As Integer, _
            ByVal desc_item As String, _
            ByVal qte As Decimal, _
            ByVal valor As Decimal, _
            ByVal diretorio As String)
        _id_item = id_item
        _num_registro = num_registro
        _ano_registro = ano_registro
        _id_secao = id_secao
        _desc_item = desc_item
        _qte = qte
        _valor = valor
        _diretorio = diretorio

    End Sub

    Public Property ID_ITEM() As Integer
        Get

            Return _id_item

        End Get
        Set(ByVal value As Integer)

            _id_item = value

        End Set
    End Property

    Public Property NUM_REGISTRO() As Integer
        Get

            Return _num_registro

        End Get
        Set(ByVal value As Integer)

            _num_registro = value

        End Set
    End Property

    Public Property ANO_REGISTRO() As Integer
        Get

            Return _ano_registro

        End Get
        Set(ByVal value As Integer)

            _ano_registro = value

        End Set
    End Property

    Public Property ID_SECAO() As Integer
        Get

            Return _id_secao

        End Get
        Set(ByVal value As Integer)

            _id_secao = value

        End Set
    End Property

    Public Property DESC_ITEM() As String
        Get

            Return _desc_item

        End Get
        Set(ByVal value As String)

            _desc_item = value

        End Set
    End Property

    Public Property QTE() As Decimal
        Get

            Return _qte

        End Get
        Set(ByVal value As Decimal)

            _qte = value

        End Set
    End Property

    Public Property VALOR() As Decimal
        Get

            Return _valor

        End Get
        Set(ByVal value As Decimal)

            _valor = value

        End Set
    End Property

    Public Property DIRETORIO() As String
        Get

            Return _diretorio

        End Get
        Set(ByVal value As String)

            _diretorio = value

        End Set
    End Property

End Class
